From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 5 Nov 2003 16:45:11 +0000 (+0000)
Subject: (Flogb): Don't use VALMASK.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~25052
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=e5a0318211d2f7bc82dee74b94c114a49c6828a7;p=emacs.git

(Flogb): Don't use VALMASK.
---

diff --git a/src/floatfns.c b/src/floatfns.c
index 84a2dac7df6..61879eabe39 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -1,5 +1,5 @@
 /* Primitive operations on floating point for GNU Emacs Lisp interpreter.
-   Copyright (C) 1988, 1993, 1994, 1999 Free Software Foundation, Inc.
+   Copyright (C) 1988, 1993, 1994, 1999, 2003  Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -692,7 +692,7 @@ This is the same as the exponent of a float.  */)
   double f = extract_float (arg);
 
   if (f == 0.0)
-    value = -(VALMASK >> 1);
+    value = MOST_NEGATIVE_FIXNUM;
   else
     {
 #ifdef HAVE_LOGB